home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d8 / tfedexxa.arc / TFE2-20.DEF < prev    next >
Text File  |  1991-05-22  |  5KB  |  171 lines
  1. BEGIN leftb, bothB, rightb, leftM, rightM, upM, downM, 50, 50
  2.  
  3. ;------------------------------LEFT BUTTON-----------------------------------
  4.  
  5. leftb:  MATCH 13,32,,"EXIT",yes,return
  6.  
  7. ;-----------------------------BOTH BUTTONS ----------------------------------
  8.  
  9. bothB:  execute main
  10.  
  11. ;-----------------------------RIGHT BUTTON ----------------------------------
  12.  
  13. rightb:   match 13,32,,"Exit",no,escape
  14.  
  15. ;------------------------------LEFT MOTION-----------------------------------
  16.  
  17. leftM:   MATCH 3,1,,"ASDSDDFD",NUL,LEFT
  18.  
  19. ;------------------------------RIGHT MOTION----------------------------------
  20. rightM:   MATCH 3,1,,"QWERTRYU",NUL,RIGHT
  21.  
  22. ;------------------------------UP MOTION-------------------------------------
  23.  
  24. upM:    MATCH 7,26,,"QWERTYU",NUL,UP
  25. ;------------------------------DOWN MOTION-----------------------------------
  26.  
  27. downM:    MATCH 2,3,,"QWERTYU",NUL,DOWN
  28. ;------------------------------MENUS-----------------------------------------
  29.  
  30. MAIN:   popup 1,17,23
  31.  
  32. text "╒══╡ TFE (Telix Fon Ed) v2.20 Command Mouse Menu  ╞══╕"
  33. text "│ QUIT MENU......Return to command level or on line. │"
  34. text "│                                                    │"
  35. text "│             --- Marking Functions ---              │"
  36. text "│ Mark/Unmark.......Ctrl-M  Mark Range........Ctrl-K │"
  37. text "│ Translate.........Ctrl-T  Unmark Range......Ctrl-U │"
  38. text "│                                                    │"
  39. text "│             --- Editor  Functions ---              │"
  40. text "│ Add................Alt-A  Block..............Alt-B │"
  41. text "│ Copy...............Alt-C  Delete.............Alt-D │"
  42. text "│ Export.............Alt-E  Find...............Alt-F │"
  43. text "│ Import.............Alt-I  Load...............Alt-L │"
  44. text "│ Move...............Alt-M  Print..............Alt-P │"
  45. text "│ Replace............Alt-R  Sort...............Alt-S │"
  46. text "│ Write..............Alt-W  eXit...............Alt-X │"
  47. text "│                                                    │"
  48. text "│              --- Other Functions ---               │"
  49. text "│ Help...............Alt-Z  Menu (if available)...F1 │"
  50. text "│ Edit TFE Data.........F2  Delete Duplicates.....F3 │"
  51. text "│ Begin/End Macro.......F7  Play Back Macro.......F8 │"
  52. text "│                                                    │"
  53. text "│  Left-yes/select     Both-menu    Right-escape/no  │"
  54. text "╘════════════════════════════════════════════════════╛"
  55. select 2,3,50,nul
  56. select 5,3,24,CTRLkM
  57. select 6,3,24,CTRLkT
  58. select 5,29,24,CTRLkK
  59. select 6,29,24,CTRLkU
  60. select 9,3,24,ALTkA
  61. select 10,3,24,ALTkC
  62. select 11,3,24,ALTkE
  63. select 12,3,24,ALTkI
  64. select 13,3,24,ALTkM
  65. select 14,3,24,ALTkR
  66. select 15,3,24,ALTkW
  67. select 9,29,24,ALTkB
  68. select 10,29,24,ALTkD
  69. select 11,29,24,ALTkF
  70. select 12,29,24,ALTkL
  71. select 13,29,24,ALTkP
  72. select 14,29,24,ALTkS
  73. select 15,29,24,ALTkX
  74. select 18,3,24,ALTkZ
  75. select 19,3,24,F2
  76. select 20,3,24,F7
  77. select 18,29,24,F1
  78. select 19,29,24,F3
  79. select 20,29,24,F8
  80.  
  81. pend
  82.  
  83. ;------------------------------KEYS------------------------------------------
  84.  
  85. NUL:           NOTHING
  86. RETURN:        TYPE 13
  87. ESCAPE:        TYPE 27
  88. CANCEL:        TYPE 27
  89. REVM:      TYPE "R"
  90. LOADM:     TYPE "L"
  91. SAVM:      TYPE "S"
  92. CLRM:      TYPE "C"
  93. EXITM:     TYPE 27
  94. ESCRES:      EXECUTE ESCAPE
  95. EXITY:       EXECUTE YES
  96. EXITN:       EXECUTE NO
  97. EXIT:        EXECUTE NOMOT,ALTkX
  98. NOMOT:      ASSIGN leftb,rightb,bothB
  99. YES:        TYPE "Y"
  100. NO:         TYPE "N"
  101. F1:            TYPE 0,59
  102. F2:            TYPE 0,60
  103. F3:            TYPE 0,61
  104. F4:            TYPE 0,62
  105. F5:            TYPE 0,63
  106. F6:            TYPE 0,64
  107. F7:            TYPE 0,65
  108. F8:            TYPE 0,66
  109. F9:            TYPE 0,67
  110. F10:           TYPE 0,68
  111. ALTkA:         TYPE 0,30
  112. ALTkB:         TYPE 0,48
  113. ALTkC:         TYPE 0,46
  114. ALTkD:         TYPE 0,32
  115. ALTkE:         TYPE 0,18
  116. ALTkF:         TYPE 0,33
  117. ALTkG:         TYPE 0,34
  118. ALTkH:         TYPE 0,35
  119. ALTkI:         TYPE 0,23
  120. ALTkJ:         TYPE 0,36
  121. ALTkK:         TYPE 0,37
  122. ALTkL:         TYPE 0,38
  123. ALTkM:         TYPE 0,50
  124. ALTkN:         TYPE 0,49
  125. ALTkO:         TYPE 0,24
  126. ALTkP:         TYPE 0,25
  127. ALTkQ:         TYPE 0,16
  128. ALTkR:         TYPE 0,19
  129. ALTkS:         TYPE 0,31
  130. ALTkT:         TYPE 0,20
  131. ALTkU:         TYPE 0,22
  132. ALTkV:         TYPE 0,47
  133. ALTkW:         TYPE 0,17
  134. ALTkX:         TYPE 0,45
  135. ALTkY:         TYPE 0,21
  136. ALTkZ:         TYPE 0,44
  137. ALTk0:         TYPE 0,129
  138. ALTk1:         TYPE 0,120
  139. ALTk2:         TYPE 0,121
  140. ALTk3:         TYPE 0,122
  141. ALTk4:         TYPE 0,123
  142. ALTk5:         TYPE 0,124
  143. ALTk6:         TYPE 0,125
  144. ALTk7:         TYPE 0,126
  145. ALTk8:         TYPE 0,127
  146. ALTk9:         TYPE 0,128
  147. CTRLkK:        TYPE 11
  148. CTRLkM:        TYPE 13
  149. CTRLkT:        TYPE 20
  150. CTRLkU:        TYPE 21
  151. CTRLkPRTSC:    TYPE 0,114
  152. CTRLkEND:      TYPE 0,117
  153. SHIFTkTAB:     TYPE 0,15
  154.  
  155. HOME:          TYPE 0,71
  156. END:           TYPE 0,79
  157. ENDHOME:       TYPE 0,79,0,71
  158. BKTB:          TYPE 0,15
  159. TB:            TYPE 9
  160. PGUP:          TYPE 0,73
  161. PGDN:          TYPE 0,81
  162. LEFT:          TYPE 0,75
  163. RIGHT:         TYPE 0,77
  164. UP:            TYPE 0,72
  165. DOWN:          TYPE 0,80
  166. SPACE:         TYPE 32
  167. A:             TYPE 65
  168. B:             TYPE 66
  169. C:             TYPE 67
  170.  
  171.